home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 167 / 167.d81 / program 3 (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  254b  |  14 lines
  1. 0 rem -- program 3, indirect
  2. 10 forl=0to28
  3. 20 readd:c=c+d
  4. 30 poke24576+l,d:next
  5. 40 ifc<>3616thenprint"data error":end
  6. 50 sys24576
  7. 24576 data 169,160,133,254
  8. 24580 data 169,4,133,253
  9. 24584 data 162,0,161,253,141,0,4
  10. 24591 data 160,1,177,253,141,1,4
  11. 24598 data 200
  12. 24599 data 177,253,153,0,4
  13. 24604 data 96
  14.